Chip 2007 January, February, March & April/Chip-Cover-CD-2007-02.iso/Pakiet bezpieczenstwa/mini Pentoo LiveCD 2006.1/mpentoo-2006.1.iso/livecd.squashfs/usr/lib/python2.4/test/test_tcl.pyc

Python Compiled Bytecode | 2005-10-18 | 6KB | 182 lines

# Source Generated with Decompyle++
# File: in.pyc (Python 2.4)

import unittest
import os
from test import test_support
from Tkinter import Tcl
from _tkinter import TclError

class TclTest(unittest.TestCase):

    def setUp(self):
        self.interp = Tcl()


    def testEval(self):
        tcl = self.interp
        tcl.eval('set a 1')
        self.assertEqual(tcl.eval('set a'), '1')


    def testEvalException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.eval, 'set a')


    def testEvalException2(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.eval, 'this is wrong')


    def testCall(self):
        tcl = self.interp
        tcl.call('set', 'a', '1')
        self.assertEqual(tcl.call('set', 'a'), '1')


    def testCallException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.call, 'set', 'a')


    def testCallException2(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.call, 'this', 'is', 'wrong')


    def testSetVar(self):
        tcl = self.interp
        tcl.setvar('a', '1')
        self.assertEqual(tcl.eval('set a'), '1')


    def testSetVarArray(self):
        tcl = self.interp
        tcl.setvar('a(1)', '1')
        self.assertEqual(tcl.eval('set a(1)'), '1')


    def testGetVar(self):
        tcl = self.interp
        tcl.eval('set a 1')
        self.assertEqual(tcl.getvar('a'), '1')


    def testGetVarArray(self):
        tcl = self.interp
        tcl.eval('set a(1) 1')
        self.assertEqual(tcl.getvar('a(1)'), '1')


    def testGetVarException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.getvar, 'a')


    def testGetVarArrayException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.getvar, 'a(1)')


    def testUnsetVar(self):
        tcl = self.interp
        tcl.setvar('a', 1)
        self.assertEqual(tcl.eval('info exists a'), '1')
        tcl.unsetvar('a')
        self.assertEqual(tcl.eval('info exists a'), '0')


    def testUnsetVarArray(self):
        tcl = self.interp
        tcl.setvar('a(1)', 1)
        tcl.setvar('a(2)', 2)
        self.assertEqual(tcl.eval('info exists a(1)'), '1')
        self.assertEqual(tcl.eval('info exists a(2)'), '1')
        tcl.unsetvar('a(1)')
        self.assertEqual(tcl.eval('info exists a(1)'), '0')
        self.assertEqual(tcl.eval('info exists a(2)'), '1')


    def testUnsetVarException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.unsetvar, 'a')


    def testEvalFile(self):
        tcl = self.interp
        filename = 'testEvalFile.tcl'
        fd = open(filename, 'w')
        script = 'set a 1\n        set b 2\n        set c [ expr $a + $b ]\n        '
        fd.write(script)
        fd.close()
        tcl.evalfile(filename)
        os.remove(filename)
        self.assertEqual(tcl.eval('set a'), '1')
        self.assertEqual(tcl.eval('set b'), '2')
        self.assertEqual(tcl.eval('set c'), '3')


    def testEvalFileException(self):
        tcl = self.interp
        filename = 'doesnotexists'

        try:
            os.remove(filename)
        except Exception:
            e = None

        self.assertRaises(TclError, tcl.evalfile, filename)


    def testPackageRequireException(self):
        tcl = self.interp
        self.assertRaises(TclError, tcl.eval, 'package require DNE')


    def testLoadTk(self):
        import os
        if 'DISPLAY' not in os.environ:
            return None

        tcl = Tcl()
        self.assertRaises(TclError, tcl.winfo_geometry)
        tcl.loadtk()
        self.assertEqual('1x1+0+0', tcl.winfo_geometry())


    def testLoadTkFailure(self):
        import os
        old_display = None
        import sys as sys
        if sys.platform.startswith('win') and sys.platform.startswith('darwin') or sys.platform.startswith('cygwin'):
            return None

        if 'DISPLAY' in os.environ:
            old_display = os.environ['DISPLAY']
            del os.environ['DISPLAY']
            display = os.popen('echo $DISPLAY').read().strip()
            if display:
                return None



        try:
            tcl = Tcl()
            self.assertRaises(TclError, tcl.winfo_geometry)
            self.assertRaises(TclError, tcl.loadtk)
        finally:
            if old_display is not None:
                os.environ['DISPLAY'] = old_display





def test_main():
    test_support.run_unittest(TclTest)

if __name__ == '__main__':
    test_main()